﻿Public Class clsAgvRoute
    Public Function SelectAgvRouteByLHJ(lhj As String) As DataTable
        Dim szSql As String = "select * from agv.route where agv.route.lhj = ?"
        Dim dt As DataTable = DBacs.ExecuteSql(szSql, -1, lhj)
        Return dt
    End Function
End Class
